change align to use derived-mode-p

* lisp/align.el (align-region): Use derived-mode-p.

diff --git a/lisp/align.el b/lisp/align.el
index b6a855b49543e37ea3aef893f59cb57f4ebfde3f..000b63ed78532a31803e44b5061505d0545ecb39 100644 (file)
--- a/lisp/align.el
+++ b/lisp/align.el
@@ -1322,7 +1322,7 @@ aligner would have dealt with are."
             (modes (assq 'modes rule)))
        ;; unless the `run-if' form tells us not to, look for the
        ;; rule..
-       (unless (or (and modes (not (memq major-mode
+       (unless (or (and modes (not (cl-member-if #'derived-mode-p
                                          (eval (cdr modes)))))
                    (and run-if (not (funcall (cdr run-if)))))
          (let* ((case-fold-search case-fold-search)